From: Stefan Monnier Date: Mon, 8 Nov 2010 19:09:21 +0000 (-0500) Subject: * lisp/emacs-lisp/cl-macs.el (extent-data, extent-face, extent-priority) X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~324^2~5755 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=197227f36ed83b5ed75d426c6a0e6c7500764819;p=emacs.git * lisp/emacs-lisp/cl-macs.el (extent-data, extent-face, extent-priority) (extent-end-position, extent-start-position): Remove setf method for non-existing functions. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index be6d077bcfe..18e2345a27c 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,9 @@ +2010-11-08 Stefan Monnier + + * emacs-lisp/cl-macs.el (extent-data, extent-face, extent-priority) + (extent-end-position, extent-start-position): Remove setf method for + non-existing functions (bug#7319). + 2010-11-07 Stefan Monnier * emacs-lisp/smie.el: Simplify the smie-rules-function return values. diff --git a/lisp/emacs-lisp/cl-macs.el b/lisp/emacs-lisp/cl-macs.el index 0cd518bbe62..76f677c6198 100644 --- a/lisp/emacs-lisp/cl-macs.el +++ b/lisp/emacs-lisp/cl-macs.el @@ -1748,15 +1748,6 @@ Example: (defsetf default-file-modes set-default-file-modes t) (defsetf default-value set-default) (defsetf documentation-property put) -(defsetf extent-data set-extent-data) -(defsetf extent-face set-extent-face) -(defsetf extent-priority set-extent-priority) -(defsetf extent-end-position (ext) (store) - (list 'progn (list 'set-extent-endpoints (list 'extent-start-position ext) - store) store)) -(defsetf extent-start-position (ext) (store) - (list 'progn (list 'set-extent-endpoints store - (list 'extent-end-position ext)) store)) (defsetf face-background (f &optional s) (x) (list 'set-face-background f x s)) (defsetf face-background-pixmap (f &optional s) (x) (list 'set-face-background-pixmap f x s))